home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue53 / Clinic / CopyAFile2Form.dfm / CopyAFile2Form.txt
Encoding:
Text File  |  1999-12-03  |  590 b   |  31 lines
  1. object Form1: TForm1
  2.   Left = 192
  3.   Top = 108
  4.   Width = 186
  5.   Height = 125
  6.   Caption = 'File Copying Test'
  7.   Font.Color = clWindowText
  8.   Font.Height = -11
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   PixelsPerInch = 96
  12.   TextHeight = 13
  13.   object btnCopy: TButton
  14.     Left = 51
  15.     Top = 36
  16.     Width = 75
  17.     Height = 25
  18.     Caption = '&Copy A File'
  19.     Default = True
  20.     TabOrder = 0
  21.     OnClick = btnCopyClick
  22.   end
  23.   object dlgSource: TOpenDialog
  24.     FileEditStyle = fsEdit
  25.     Filter = 'Any file (*.*)|*.*'
  26.     Title = 'Choose a file to copy'
  27.     Left = 24
  28.     Top = 32
  29.   end
  30. end
  31.